// export CZASc , czas ; every 0 0$1 trigger CZASC = true do
   0: LD_EXP 1
   4: PUSH
   5: LD_INT 1
   7: EQUAL
   8: IFFALSE 31
  10: GO 12
  12: DISABLE
// begin Display_Strings := [ #Am03-1 , CZAS ] ;
  13: LD_ADDR_OWVAR 47
  17: PUSH
  18: LD_STRING #Am03-1
  20: PUSH
  21: LD_EXP 2
  25: PUSH
  26: EMPTY
  27: LIST
  28: LIST
  29: ST_TO_ADDR
// enable ;
  30: ENABLE
// end ;
  31: END
// every 0 0$01 trigger CzasC = true do
  32: LD_EXP 1
  36: PUSH
  37: LD_INT 1
  39: EQUAL
  40: IFFALSE 60
  42: GO 44
  44: DISABLE
// begin enable ;
  45: ENABLE
// Czas = Czas + 0 0$01 ;
  46: LD_ADDR_EXP 2
  50: PUSH
  51: LD_EXP 2
  55: PUSH
  56: LD_INT 35
  58: PLUS
  59: ST_TO_ADDR
// end ; end_of_file
  60: END
// export comp_engs3 , comp_engs2 , Ru6_Turret ; export function PrepareRussian ; var Ru6_turret , i , un , k , l , level ; begin
  61: LD_INT 0
  63: PPUSH
  64: PPUSH
  65: PPUSH
  66: PPUSH
  67: PPUSH
  68: PPUSH
  69: PPUSH
// RU6_Turret := FilterAllUnits ( [ [ f_side , 6 ] , [ f_btype , b_bunker ] ] ) ;
  70: LD_ADDR_VAR 0 2
  74: PUSH
  75: LD_INT 22
  77: PUSH
  78: LD_INT 6
  80: PUSH
  81: EMPTY
  82: LIST
  83: LIST
  84: PUSH
  85: LD_INT 30
  87: PUSH
  88: LD_INT 32
  90: PUSH
  91: EMPTY
  92: LIST
  93: LIST
  94: PUSH
  95: EMPTY
  96: LIST
  97: LIST
  98: PPUSH
  99: CALL_OW 69
 103: ST_TO_ADDR
// uc_side = 6 ;
 104: LD_ADDR_OWVAR 20
 108: PUSH
 109: LD_INT 6
 111: ST_TO_ADDR
// uc_nation = 3 ;
 112: LD_ADDR_OWVAR 21
 116: PUSH
 117: LD_INT 3
 119: ST_TO_ADDR
// hc_gallery =  ;
 120: LD_ADDR_OWVAR 33
 124: PUSH
 125: LD_STRING 
 127: ST_TO_ADDR
// hc_name =  ;
 128: LD_ADDR_OWVAR 26
 132: PUSH
 133: LD_STRING 
 135: ST_TO_ADDR
// for i in Ru6_Turret do
 136: LD_ADDR_VAR 0 3
 140: PUSH
 141: LD_VAR 0 2
 145: PUSH
 146: FOR_IN
 147: IFFALSE 294
// begin if IsInUnit ( i ) = 0 then
 149: LD_VAR 0 3
 153: PPUSH
 154: CALL_OW 310
 158: PUSH
 159: LD_INT 0
 161: EQUAL
 162: IFFALSE 292
// begin Level = 6 ;
 164: LD_ADDR_VAR 0 7
 168: PUSH
 169: LD_INT 6
 171: ST_TO_ADDR
// hc_attr = [ Rand ( 9 , 11 ) , Rand ( 10 , 12 ) ] ;
 172: LD_ADDR_OWVAR 29
 176: PUSH
 177: LD_INT 9
 179: PPUSH
 180: LD_INT 11
 182: PPUSH
 183: CALL_OW 12
 187: PUSH
 188: LD_INT 10
 190: PPUSH
 191: LD_INT 12
 193: PPUSH
 194: CALL_OW 12
 198: PUSH
 199: EMPTY
 200: LIST
 201: LIST
 202: ST_TO_ADDR
// hc_skills = [ Level , 1 , Rand ( 1 , 2 ) , Rand ( 0 , 4 ) ] ;
 203: LD_ADDR_OWVAR 31
 207: PUSH
 208: LD_VAR 0 7
 212: PUSH
 213: LD_INT 1
 215: PUSH
 216: LD_INT 1
 218: PPUSH
 219: LD_INT 2
 221: PPUSH
 222: CALL_OW 12
 226: PUSH
 227: LD_INT 0
 229: PPUSH
 230: LD_INT 4
 232: PPUSH
 233: CALL_OW 12
 237: PUSH
 238: EMPTY
 239: LIST
 240: LIST
 241: LIST
 242: LIST
 243: ST_TO_ADDR
// hc_sex = Rand ( sex_male , sex_female ) ;
 244: LD_ADDR_OWVAR 27
 248: PUSH
 249: LD_INT 1
 251: PPUSH
 252: LD_INT 2
 254: PPUSH
 255: CALL_OW 12
 259: ST_TO_ADDR
// hc_class = 1 ;
 260: LD_ADDR_OWVAR 28
 264: PUSH
 265: LD_INT 1
 267: ST_TO_ADDR
// un := CreateHuman ;
 268: LD_ADDR_VAR 0 4
 272: PUSH
 273: CALL_OW 44
 277: ST_TO_ADDR
// PlaceHumanInUnit ( un , i ) ;
 278: LD_VAR 0 4
 282: PPUSH
 283: LD_VAR 0 3
 287: PPUSH
 288: CALL_OW 52
// end ; end ;
 292: GO 146
 294: POP
 295: POP
// for i in fabryka1 do
 296: LD_ADDR_VAR 0 3
 300: PUSH
 301: LD_INT 104
 303: PUSH
 304: FOR_IN
 305: IFFALSE 522
// begin l = 0 ;
 307: LD_ADDR_VAR 0 6
 311: PUSH
 312: LD_INT 0
 314: ST_TO_ADDR
// if IsInUnit ( i ) = 0 then
 315: LD_VAR 0 3
 319: PPUSH
 320: CALL_OW 310
 324: PUSH
 325: LD_INT 0
 327: EQUAL
 328: IFFALSE 520
// begin Level = 6 ;
 330: LD_ADDR_VAR 0 7
 334: PUSH
 335: LD_INT 6
 337: ST_TO_ADDR
// repeat begin uc_side = 6 ;
 338: LD_ADDR_OWVAR 20
 342: PUSH
 343: LD_INT 6
 345: ST_TO_ADDR
// uc_nation = 3 ;
 346: LD_ADDR_OWVAR 21
 350: PUSH
 351: LD_INT 3
 353: ST_TO_ADDR
// hc_gallery =  ;
 354: LD_ADDR_OWVAR 33
 358: PUSH
 359: LD_STRING 
 361: ST_TO_ADDR
// hc_name =  ;
 362: LD_ADDR_OWVAR 26
 366: PUSH
 367: LD_STRING 
 369: ST_TO_ADDR
// hc_attr = [ Rand ( 9 , 11 ) , Rand ( 10 , 12 ) ] ;
 370: LD_ADDR_OWVAR 29
 374: PUSH
 375: LD_INT 9
 377: PPUSH
 378: LD_INT 11
 380: PPUSH
 381: CALL_OW 12
 385: PUSH
 386: LD_INT 10
 388: PPUSH
 389: LD_INT 12
 391: PPUSH
 392: CALL_OW 12
 396: PUSH
 397: EMPTY
 398: LIST
 399: LIST
 400: ST_TO_ADDR
// hc_skills = [ Rand ( 0 , 3 ) , Rand ( 0 , 1 ) , Level , Rand ( 0 , 1 ) ] ;
 401: LD_ADDR_OWVAR 31
 405: PUSH
 406: LD_INT 0
 408: PPUSH
 409: LD_INT 3
 411: PPUSH
 412: CALL_OW 12
 416: PUSH
 417: LD_INT 0
 419: PPUSH
 420: LD_INT 1
 422: PPUSH
 423: CALL_OW 12
 427: PUSH
 428: LD_VAR 0 7
 432: PUSH
 433: LD_INT 0
 435: PPUSH
 436: LD_INT 1
 438: PPUSH
 439: CALL_OW 12
 443: PUSH
 444: EMPTY
 445: LIST
 446: LIST
 447: LIST
 448: LIST
 449: ST_TO_ADDR
// hc_sex = Rand ( sex_male , sex_female ) ;
 450: LD_ADDR_OWVAR 27
 454: PUSH
 455: LD_INT 1
 457: PPUSH
 458: LD_INT 2
 460: PPUSH
 461: CALL_OW 12
 465: ST_TO_ADDR
// hc_class = 3 ;
 466: LD_ADDR_OWVAR 28
 470: PUSH
 471: LD_INT 3
 473: ST_TO_ADDR
// un = CreateHuman ;
 474: LD_ADDR_VAR 0 4
 478: PUSH
 479: CALL_OW 44
 483: ST_TO_ADDR
// PlaceHumanInUnit ( un , fabryka1 ) ;
 484: LD_VAR 0 4
 488: PPUSH
 489: LD_INT 104
 491: PPUSH
 492: CALL_OW 52
// l = l + 1 ;
 496: LD_ADDR_VAR 0 6
 500: PUSH
 501: LD_VAR 0 6
 505: PUSH
 506: LD_INT 1
 508: PLUS
 509: ST_TO_ADDR
// end until l = 2 ;
 510: LD_VAR 0 6
 514: PUSH
 515: LD_INT 2
 517: EQUAL
 518: IFFALSE 338
// end ; end ;
 520: GO 304
 522: POP
 523: POP
// for i in lab1 do
 524: LD_ADDR_VAR 0 3
 528: PUSH
 529: LD_INT 211
 531: PUSH
 532: FOR_IN
 533: IFFALSE 750
// begin l = 0 ;
 535: LD_ADDR_VAR 0 6
 539: PUSH
 540: LD_INT 0
 542: ST_TO_ADDR
// if IsInUnit ( i ) = 0 then
 543: LD_VAR 0 3
 547: PPUSH
 548: CALL_OW 310
 552: PUSH
 553: LD_INT 0
 555: EQUAL
 556: IFFALSE 748
// begin Level = 6 ;
 558: LD_ADDR_VAR 0 7
 562: PUSH
 563: LD_INT 6
 565: ST_TO_ADDR
// repeat begin uc_side = 6 ;
 566: LD_ADDR_OWVAR 20
 570: PUSH
 571: LD_INT 6
 573: ST_TO_ADDR
// uc_nation = 3 ;
 574: LD_ADDR_OWVAR 21
 578: PUSH
 579: LD_INT 3
 581: ST_TO_ADDR
// hc_gallery =  ;
 582: LD_ADDR_OWVAR 33
 586: PUSH
 587: LD_STRING 
 589: ST_TO_ADDR
// hc_name =  ;
 590: LD_ADDR_OWVAR 26
 594: PUSH
 595: LD_STRING 
 597: ST_TO_ADDR
// hc_attr = [ Rand ( 9 , 11 ) , Rand ( 10 , 12 ) ] ;
 598: LD_ADDR_OWVAR 29
 602: PUSH
 603: LD_INT 9
 605: PPUSH
 606: LD_INT 11
 608: PPUSH
 609: CALL_OW 12
 613: PUSH
 614: LD_INT 10
 616: PPUSH
 617: LD_INT 12
 619: PPUSH
 620: CALL_OW 12
 624: PUSH
 625: EMPTY
 626: LIST
 627: LIST
 628: ST_TO_ADDR
// hc_skills = [ Rand ( 0 , 3 ) , Rand ( 0 , 1 ) , Level , Rand ( 2 , 4 ) ] ;
 629: LD_ADDR_OWVAR 31
 633: PUSH
 634: LD_INT 0
 636: PPUSH
 637: LD_INT 3
 639: PPUSH
 640: CALL_OW 12
 644: PUSH
 645: LD_INT 0
 647: PPUSH
 648: LD_INT 1
 650: PPUSH
 651: CALL_OW 12
 655: PUSH
 656: LD_VAR 0 7
 660: PUSH
 661: LD_INT 2
 663: PPUSH
 664: LD_INT 4
 666: PPUSH
 667: CALL_OW 12
 671: PUSH
 672: EMPTY
 673: LIST
 674: LIST
 675: LIST
 676: LIST
 677: ST_TO_ADDR
// hc_sex = Rand ( sex_male , sex_female ) ;
 678: LD_ADDR_OWVAR 27
 682: PUSH
 683: LD_INT 1
 685: PPUSH
 686: LD_INT 2
 688: PPUSH
 689: CALL_OW 12
 693: ST_TO_ADDR
// hc_class = 4 ;
 694: LD_ADDR_OWVAR 28
 698: PUSH
 699: LD_INT 4
 701: ST_TO_ADDR
// un = CreateHuman ;
 702: LD_ADDR_VAR 0 4
 706: PUSH
 707: CALL_OW 44
 711: ST_TO_ADDR
// PlaceHumanInUnit ( un , lab1 ) ;
 712: LD_VAR 0 4
 716: PPUSH
 717: LD_INT 211
 719: PPUSH
 720: CALL_OW 52
// l = l + 1 ;
 724: LD_ADDR_VAR 0 6
 728: PUSH
 729: LD_VAR 0 6
 733: PUSH
 734: LD_INT 1
 736: PLUS
 737: ST_TO_ADDR
// end until l = 3 ;
 738: LD_VAR 0 6
 742: PUSH
 743: LD_INT 3
 745: EQUAL
 746: IFFALSE 566
// end ; end ;
 748: GO 532
 750: POP
 751: POP
// for i in fabryka2 do
 752: LD_ADDR_VAR 0 3
 756: PUSH
 757: LD_INT 112
 759: PUSH
 760: FOR_IN
 761: IFFALSE 978
// begin l = 0 ;
 763: LD_ADDR_VAR 0 6
 767: PUSH
 768: LD_INT 0
 770: ST_TO_ADDR
// if IsInUnit ( i ) = 0 then
 771: LD_VAR 0 3
 775: PPUSH
 776: CALL_OW 310
 780: PUSH
 781: LD_INT 0
 783: EQUAL
 784: IFFALSE 976
// begin Level = 6 ;
 786: LD_ADDR_VAR 0 7
 790: PUSH
 791: LD_INT 6
 793: ST_TO_ADDR
// repeat begin uc_side = 6 ;
 794: LD_ADDR_OWVAR 20
 798: PUSH
 799: LD_INT 6
 801: ST_TO_ADDR
// uc_nation = 3 ;
 802: LD_ADDR_OWVAR 21
 806: PUSH
 807: LD_INT 3
 809: ST_TO_ADDR
// hc_gallery =  ;
 810: LD_ADDR_OWVAR 33
 814: PUSH
 815: LD_STRING 
 817: ST_TO_ADDR
// hc_name =  ;
 818: LD_ADDR_OWVAR 26
 822: PUSH
 823: LD_STRING 
 825: ST_TO_ADDR
// hc_attr = [ Rand ( 9 , 11 ) , Rand ( 10 , 12 ) ] ;
 826: LD_ADDR_OWVAR 29
 830: PUSH
 831: LD_INT 9
 833: PPUSH
 834: LD_INT 11
 836: PPUSH
 837: CALL_OW 12
 841: PUSH
 842: LD_INT 10
 844: PPUSH
 845: LD_INT 12
 847: PPUSH
 848: CALL_OW 12
 852: PUSH
 853: EMPTY
 854: LIST
 855: LIST
 856: ST_TO_ADDR
// hc_skills = [ Rand ( 0 , 3 ) , Rand ( 0 , 1 ) , Level , Rand ( 0 , 1 ) ] ;
 857: LD_ADDR_OWVAR 31
 861: PUSH
 862: LD_INT 0
 864: PPUSH
 865: LD_INT 3
 867: PPUSH
 868: CALL_OW 12
 872: PUSH
 873: LD_INT 0
 875: PPUSH
 876: LD_INT 1
 878: PPUSH
 879: CALL_OW 12
 883: PUSH
 884: LD_VAR 0 7
 888: PUSH
 889: LD_INT 0
 891: PPUSH
 892: LD_INT 1
 894: PPUSH
 895: CALL_OW 12
 899: PUSH
 900: EMPTY
 901: LIST
 902: LIST
 903: LIST
 904: LIST
 905: ST_TO_ADDR
// hc_sex = Rand ( sex_male , sex_female ) ;
 906: LD_ADDR_OWVAR 27
 910: PUSH
 911: LD_INT 1
 913: PPUSH
 914: LD_INT 2
 916: PPUSH
 917: CALL_OW 12
 921: ST_TO_ADDR
// hc_class = 3 ;
 922: LD_ADDR_OWVAR 28
 926: PUSH
 927: LD_INT 3
 929: ST_TO_ADDR
// un = CreateHuman ;
 930: LD_ADDR_VAR 0 4
 934: PUSH
 935: CALL_OW 44
 939: ST_TO_ADDR
// PlaceHumanInUnit ( un , fabryka2 ) ;
 940: LD_VAR 0 4
 944: PPUSH
 945: LD_INT 112
 947: PPUSH
 948: CALL_OW 52
// l = l + 1 ;
 952: LD_ADDR_VAR 0 6
 956: PUSH
 957: LD_VAR 0 6
 961: PUSH
 962: LD_INT 1
 964: PLUS
 965: ST_TO_ADDR
// end until l = 2 ;
 966: LD_VAR 0 6
 970: PUSH
 971: LD_INT 2
 973: EQUAL
 974: IFFALSE 794
// end ; end ;
 976: GO 760
 978: POP
 979: POP
// for i in lab5 do
 980: LD_ADDR_VAR 0 3
 984: PUSH
 985: LD_INT 214
 987: PUSH
 988: FOR_IN
 989: IFFALSE 1206
// begin l = 0 ;
 991: LD_ADDR_VAR 0 6
 995: PUSH
 996: LD_INT 0
 998: ST_TO_ADDR
// if IsInUnit ( i ) = 0 then
 999: LD_VAR 0 3
1003: PPUSH
1004: CALL_OW 310
1008: PUSH
1009: LD_INT 0
1011: EQUAL
1012: IFFALSE 1204
// begin Level = 6 ;
1014: LD_ADDR_VAR 0 7
1018: PUSH
1019: LD_INT 6
1021: ST_TO_ADDR
// repeat begin uc_side = 6 ;
1022: LD_ADDR_OWVAR 20
1026: PUSH
1027: LD_INT 6
1029: ST_TO_ADDR
// uc_nation = 3 ;
1030: LD_ADDR_OWVAR 21
1034: PUSH
1035: LD_INT 3
1037: ST_TO_ADDR
// hc_gallery =  ;
1038: LD_ADDR_OWVAR 33
1042: PUSH
1043: LD_STRING 
1045: ST_TO_ADDR
// hc_name =  ;
1046: LD_ADDR_OWVAR 26
1050: PUSH
1051: LD_STRING 
1053: ST_TO_ADDR
// hc_attr = [ Rand ( 9 , 11 ) , Rand ( 10 , 12 ) ] ;
1054: LD_ADDR_OWVAR 29
1058: PUSH
1059: LD_INT 9
1061: PPUSH
1062: LD_INT 11
1064: PPUSH
1065: CALL_OW 12
1069: PUSH
1070: LD_INT 10
1072: PPUSH
1073: LD_INT 12
1075: PPUSH
1076: CALL_OW 12
1080: PUSH
1081: EMPTY
1082: LIST
1083: LIST
1084: ST_TO_ADDR
// hc_skills = [ Rand ( 0 , 3 ) , Rand ( 0 , 1 ) , Level , Rand ( 2 , 4 ) ] ;
1085: LD_ADDR_OWVAR 31
1089: PUSH
1090: LD_INT 0
1092: PPUSH
1093: LD_INT 3
1095: PPUSH
1096: CALL_OW 12
1100: PUSH
1101: LD_INT 0
1103: PPUSH
1104: LD_INT 1
1106: PPUSH
1107: CALL_OW 12
1111: PUSH
1112: LD_VAR 0 7
1116: PUSH
1117: LD_INT 2
1119: PPUSH
1120: LD_INT 4
1122: PPUSH
1123: CALL_OW 12
1127: PUSH
1128: EMPTY
1129: LIST
1130: LIST
1131: LIST
1132: LIST
1133: ST_TO_ADDR
// hc_sex = Rand ( sex_male , sex_female ) ;
1134: LD_ADDR_OWVAR 27
1138: PUSH
1139: LD_INT 1
1141: PPUSH
1142: LD_INT 2
1144: PPUSH
1145: CALL_OW 12
1149: ST_TO_ADDR
// hc_class = 4 ;
1150: LD_ADDR_OWVAR 28
1154: PUSH
1155: LD_INT 4
1157: ST_TO_ADDR
// un = CreateHuman ;
1158: LD_ADDR_VAR 0 4
1162: PUSH
1163: CALL_OW 44
1167: ST_TO_ADDR
// PlaceHumanInUnit ( un , lab3 ) ;
1168: LD_VAR 0 4
1172: PPUSH
1173: LD_INT 190
1175: PPUSH
1176: CALL_OW 52
// l = l + 1 ;
1180: LD_ADDR_VAR 0 6
1184: PUSH
1185: LD_VAR 0 6
1189: PUSH
1190: LD_INT 1
1192: PLUS
1193: ST_TO_ADDR
// end until l = 3 ;
1194: LD_VAR 0 6
1198: PUSH
1199: LD_INT 3
1201: EQUAL
1202: IFFALSE 1022
// end ; end ;
1204: GO 988
1206: POP
1207: POP
// for i in lab7 do
1208: LD_ADDR_VAR 0 3
1212: PUSH
1213: LD_INT 75
1215: PUSH
1216: FOR_IN
1217: IFFALSE 1434
// begin l = 0 ;
1219: LD_ADDR_VAR 0 6
1223: PUSH
1224: LD_INT 0
1226: ST_TO_ADDR
// if IsInUnit ( i ) = 0 then
1227: LD_VAR 0 3
1231: PPUSH
1232: CALL_OW 310
1236: PUSH
1237: LD_INT 0
1239: EQUAL
1240: IFFALSE 1432
// begin Level = 6 ;
1242: LD_ADDR_VAR 0 7
1246: PUSH
1247: LD_INT 6
1249: ST_TO_ADDR
// repeat begin uc_side = 6 ;
1250: LD_ADDR_OWVAR 20
1254: PUSH
1255: LD_INT 6
1257: ST_TO_ADDR
// uc_nation = 3 ;
1258: LD_ADDR_OWVAR 21
1262: PUSH
1263: LD_INT 3
1265: ST_TO_ADDR
// hc_gallery =  ;
1266: LD_ADDR_OWVAR 33
1270: PUSH
1271: LD_STRING 
1273: ST_TO_ADDR
// hc_name =  ;
1274: LD_ADDR_OWVAR 26
1278: PUSH
1279: LD_STRING 
1281: ST_TO_ADDR
// hc_attr = [ Rand ( 9 , 11 ) , Rand ( 10 , 12 ) ] ;
1282: LD_ADDR_OWVAR 29
1286: PUSH
1287: LD_INT 9
1289: PPUSH
1290: LD_INT 11
1292: PPUSH
1293: CALL_OW 12
1297: PUSH
1298: LD_INT 10
1300: PPUSH
1301: LD_INT 12
1303: PPUSH
1304: CALL_OW 12
1308: PUSH
1309: EMPTY
1310: LIST
1311: LIST
1312: ST_TO_ADDR
// hc_skills = [ Rand ( 0 , 3 ) , Rand ( 0 , 1 ) , Level , Rand ( 2 , 4 ) ] ;
1313: LD_ADDR_OWVAR 31
1317: PUSH
1318: LD_INT 0
1320: PPUSH
1321: LD_INT 3
1323: PPUSH
1324: CALL_OW 12
1328: PUSH
1329: LD_INT 0
1331: PPUSH
1332: LD_INT 1
1334: PPUSH
1335: CALL_OW 12
1339: PUSH
1340: LD_VAR 0 7
1344: PUSH
1345: LD_INT 2
1347: PPUSH
1348: LD_INT 4
1350: PPUSH
1351: CALL_OW 12
1355: PUSH
1356: EMPTY
1357: LIST
1358: LIST
1359: LIST
1360: LIST
1361: ST_TO_ADDR
// hc_sex = Rand ( sex_male , sex_female ) ;
1362: LD_ADDR_OWVAR 27
1366: PUSH
1367: LD_INT 1
1369: PPUSH
1370: LD_INT 2
1372: PPUSH
1373: CALL_OW 12
1377: ST_TO_ADDR
// hc_class = 4 ;
1378: LD_ADDR_OWVAR 28
1382: PUSH
1383: LD_INT 4
1385: ST_TO_ADDR
// un = CreateHuman ;
1386: LD_ADDR_VAR 0 4
1390: PUSH
1391: CALL_OW 44
1395: ST_TO_ADDR
// PlaceHumanInUnit ( un , lab3 ) ;
1396: LD_VAR 0 4
1400: PPUSH
1401: LD_INT 190
1403: PPUSH
1404: CALL_OW 52
// l = l + 1 ;
1408: LD_ADDR_VAR 0 6
1412: PUSH
1413: LD_VAR 0 6
1417: PUSH
1418: LD_INT 1
1420: PLUS
1421: ST_TO_ADDR
// end until l = 2 ;
1422: LD_VAR 0 6
1426: PUSH
1427: LD_INT 2
1429: EQUAL
1430: IFFALSE 1250
// end ; end ;
1432: GO 1216
1434: POP
1435: POP
// for i in kosze2 do
1436: LD_ADDR_VAR 0 3
1440: PUSH
1441: LD_INT 391
1443: PUSH
1444: FOR_IN
1445: IFFALSE 1662
// begin l = 0 ;
1447: LD_ADDR_VAR 0 6
1451: PUSH
1452: LD_INT 0
1454: ST_TO_ADDR
// if IsInUnit ( i ) = 0 then
1455: LD_VAR 0 3
1459: PPUSH
1460: CALL_OW 310
1464: PUSH
1465: LD_INT 0
1467: EQUAL
1468: IFFALSE 1660
// begin Level = 6 ;
1470: LD_ADDR_VAR 0 7
1474: PUSH
1475: LD_INT 6
1477: ST_TO_ADDR
// repeat begin uc_side = 6 ;
1478: LD_ADDR_OWVAR 20
1482: PUSH
1483: LD_INT 6
1485: ST_TO_ADDR
// uc_nation = 3 ;
1486: LD_ADDR_OWVAR 21
1490: PUSH
1491: LD_INT 3
1493: ST_TO_ADDR
// hc_gallery =  ;
1494: LD_ADDR_OWVAR 33
1498: PUSH
1499: LD_STRING 
1501: ST_TO_ADDR
// hc_name =  ;
1502: LD_ADDR_OWVAR 26
1506: PUSH
1507: LD_STRING 
1509: ST_TO_ADDR
// hc_attr = [ Rand ( 9 , 11 ) , Rand ( 10 , 12 ) ] ;
1510: LD_ADDR_OWVAR 29
1514: PUSH
1515: LD_INT 9
1517: PPUSH
1518: LD_INT 11
1520: PPUSH
1521: CALL_OW 12
1525: PUSH
1526: LD_INT 10
1528: PPUSH
1529: LD_INT 12
1531: PPUSH
1532: CALL_OW 12
1536: PUSH
1537: EMPTY
1538: LIST
1539: LIST
1540: ST_TO_ADDR
// hc_skills = [ Level , Rand ( 0 , 1 ) , Rand ( 0 , 3 ) , Rand ( 0 , 1 ) ] ;
1541: LD_ADDR_OWVAR 31
1545: PUSH
1546: LD_VAR 0 7
1550: PUSH
1551: LD_INT 0
1553: PPUSH
1554: LD_INT 1
1556: PPUSH
1557: CALL_OW 12
1561: PUSH
1562: LD_INT 0
1564: PPUSH
1565: LD_INT 3
1567: PPUSH
1568: CALL_OW 12
1572: PUSH
1573: LD_INT 0
1575: PPUSH
1576: LD_INT 1
1578: PPUSH
1579: CALL_OW 12
1583: PUSH
1584: EMPTY
1585: LIST
1586: LIST
1587: LIST
1588: LIST
1589: ST_TO_ADDR
// hc_sex = Rand ( sex_male , sex_female ) ;
1590: LD_ADDR_OWVAR 27
1594: PUSH
1595: LD_INT 1
1597: PPUSH
1598: LD_INT 2
1600: PPUSH
1601: CALL_OW 12
1605: ST_TO_ADDR
// hc_class = 1 ;
1606: LD_ADDR_OWVAR 28
1610: PUSH
1611: LD_INT 1
1613: ST_TO_ADDR
// un = CreateHuman ;
1614: LD_ADDR_VAR 0 4
1618: PUSH
1619: CALL_OW 44
1623: ST_TO_ADDR
// PlaceHumanInUnit ( un , kosze2 ) ;
1624: LD_VAR 0 4
1628: PPUSH
1629: LD_INT 391
1631: PPUSH
1632: CALL_OW 52
// l = l + 1 ;
1636: LD_ADDR_VAR 0 6
1640: PUSH
1641: LD_VAR 0 6
1645: PUSH
1646: LD_INT 1
1648: PLUS
1649: ST_TO_ADDR
// end until l = 3 ;
1650: LD_VAR 0 6
1654: PUSH
1655: LD_INT 3
1657: EQUAL
1658: IFFALSE 1478
// end ; end ;
1660: GO 1444
1662: POP
1663: POP
// end ; end_of_file
1664: LD_VAR 0 1
1668: RET
// export AM3 , AM2 , AM4 , AM6 ; export function WSPARCIE1 ; begin
1669: LD_INT 0
1671: PPUSH
// ; vc_chassis = 4 ;
1672: LD_ADDR_OWVAR 37
1676: PUSH
1677: LD_INT 4
1679: ST_TO_ADDR
// vc_engine = engine_combustion ;
1680: LD_ADDR_OWVAR 39
1684: PUSH
1685: LD_INT 1
1687: ST_TO_ADDR
// vc_control = control_manual ;
1688: LD_ADDR_OWVAR 38
1692: PUSH
1693: LD_INT 1
1695: ST_TO_ADDR
// vc_weapon = 5 ;
1696: LD_ADDR_OWVAR 40
1700: PUSH
1701: LD_INT 5
1703: ST_TO_ADDR
// AM3 = CreateVehicle ;
1704: LD_ADDR_EXP 6
1708: PUSH
1709: CALL_OW 45
1713: ST_TO_ADDR
// AM2 = CreateVehicle ;
1714: LD_ADDR_EXP 7
1718: PUSH
1719: CALL_OW 45
1723: ST_TO_ADDR
// hc_class = 3 ;
1724: LD_ADDR_OWVAR 28
1728: PUSH
1729: LD_INT 3
1731: ST_TO_ADDR
// hc_name =  ;
1732: LD_ADDR_OWVAR 26
1736: PUSH
1737: LD_STRING 
1739: ST_TO_ADDR
// uc_side = 4 ;
1740: LD_ADDR_OWVAR 20
1744: PUSH
1745: LD_INT 4
1747: ST_TO_ADDR
// uc_nation = 1 ;
1748: LD_ADDR_OWVAR 21
1752: PUSH
1753: LD_INT 1
1755: ST_TO_ADDR
// hc_gallery =  ;
1756: LD_ADDR_OWVAR 33
1760: PUSH
1761: LD_STRING 
1763: ST_TO_ADDR
// hc_sex = sex_male ;
1764: LD_ADDR_OWVAR 27
1768: PUSH
1769: LD_INT 1
1771: ST_TO_ADDR
// hc_skills = [ 1 , Rand ( 0 , 2 ) , 6 , 0 ] ;
1772: LD_ADDR_OWVAR 31
1776: PUSH
1777: LD_INT 1
1779: PUSH
1780: LD_INT 0
1782: PPUSH
1783: LD_INT 2
1785: PPUSH
1786: CALL_OW 12
1790: PUSH
1791: LD_INT 6
1793: PUSH
1794: LD_INT 0
1796: PUSH
1797: EMPTY
1798: LIST
1799: LIST
1800: LIST
1801: LIST
1802: ST_TO_ADDR
// AM4 = CreateHuman ;
1803: LD_ADDR_EXP 8
1807: PUSH
1808: CALL_OW 44
1812: ST_TO_ADDR
// AM6 = CreateHuman ;
1813: LD_ADDR_EXP 9
1817: PUSH
1818: CALL_OW 44
1822: ST_TO_ADDR
// PlaceHumanInUnit ( AM4 , AM3 ) ;
1823: LD_EXP 8
1827: PPUSH
1828: LD_EXP 6
1832: PPUSH
1833: CALL_OW 52
// PlaceHumanInUnit ( AM6 , AM2 ) ;
1837: LD_EXP 9
1841: PPUSH
1842: LD_EXP 7
1846: PPUSH
1847: CALL_OW 52
// PlaceUnitArea ( AM3 , TY , false ) ;
1851: LD_EXP 6
1855: PPUSH
1856: LD_INT 1
1858: PPUSH
1859: LD_INT 0
1861: PPUSH
1862: CALL_OW 49
// PlaceUnitArea ( AM2 , TY , false ) ;
1866: LD_EXP 7
1870: PPUSH
1871: LD_INT 1
1873: PPUSH
1874: LD_INT 0
1876: PPUSH
1877: CALL_OW 49
// end ; end_of_file
1881: LD_VAR 0 1
1885: RET
// export R1 , R2 ; export function WSPARCIE2 ; begin
1886: LD_INT 0
1888: PPUSH
// ; vc_chassis = 3 ;
1889: LD_ADDR_OWVAR 37
1893: PUSH
1894: LD_INT 3
1896: ST_TO_ADDR
// vc_engine = engine_combustion ;
1897: LD_ADDR_OWVAR 39
1901: PUSH
1902: LD_INT 1
1904: ST_TO_ADDR
// vc_control = control_manual ;
1905: LD_ADDR_OWVAR 38
1909: PUSH
1910: LD_INT 1
1912: ST_TO_ADDR
// vc_weapon = 11 ;
1913: LD_ADDR_OWVAR 40
1917: PUSH
1918: LD_INT 11
1920: ST_TO_ADDR
// R1 = CreateVehicle ;
1921: LD_ADDR_EXP 10
1925: PUSH
1926: CALL_OW 45
1930: ST_TO_ADDR
// hc_class = 1 ;
1931: LD_ADDR_OWVAR 28
1935: PUSH
1936: LD_INT 1
1938: ST_TO_ADDR
// hc_name =  ;
1939: LD_ADDR_OWVAR 26
1943: PUSH
1944: LD_STRING 
1946: ST_TO_ADDR
// uc_side = 4 ;
1947: LD_ADDR_OWVAR 20
1951: PUSH
1952: LD_INT 4
1954: ST_TO_ADDR
// uc_nation = 1 ;
1955: LD_ADDR_OWVAR 21
1959: PUSH
1960: LD_INT 1
1962: ST_TO_ADDR
// hc_gallery =  ;
1963: LD_ADDR_OWVAR 33
1967: PUSH
1968: LD_STRING 
1970: ST_TO_ADDR
// hc_sex = sex_male ;
1971: LD_ADDR_OWVAR 27
1975: PUSH
1976: LD_INT 1
1978: ST_TO_ADDR
// hc_skills = [ Rand ( 2 , 6 ) , Rand ( 0 , 2 ) , Rand ( 0 , 2 ) , Rand ( 0 , 1 ) ] ;
1979: LD_ADDR_OWVAR 31
1983: PUSH
1984: LD_INT 2
1986: PPUSH
1987: LD_INT 6
1989: PPUSH
1990: CALL_OW 12
1994: PUSH
1995: LD_INT 0
1997: PPUSH
1998: LD_INT 2
2000: PPUSH
2001: CALL_OW 12
2005: PUSH
2006: LD_INT 0
2008: PPUSH
2009: LD_INT 2
2011: PPUSH
2012: CALL_OW 12
2016: PUSH
2017: LD_INT 0
2019: PPUSH
2020: LD_INT 1
2022: PPUSH
2023: CALL_OW 12
2027: PUSH
2028: EMPTY
2029: LIST
2030: LIST
2031: LIST
2032: LIST
2033: ST_TO_ADDR
// R2 = CreateHuman ;
2034: LD_ADDR_EXP 11
2038: PUSH
2039: CALL_OW 44
2043: ST_TO_ADDR
// PlaceHumanInUnit ( R2 , R1 ) ;
2044: LD_EXP 11
2048: PPUSH
2049: LD_EXP 10
2053: PPUSH
2054: CALL_OW 52
// PlaceUnitArea ( R1 , TY , false ) ;
2058: LD_EXP 10
2062: PPUSH
2063: LD_INT 1
2065: PPUSH
2066: LD_INT 0
2068: PPUSH
2069: CALL_OW 49
// end ; end_of_file
2073: LD_VAR 0 1
2077: RET
// export Rv , Rc ; export function WSPARCIE3 ; begin
2078: LD_INT 0
2080: PPUSH
// ; vc_chassis = 3 ;
2081: LD_ADDR_OWVAR 37
2085: PUSH
2086: LD_INT 3
2088: ST_TO_ADDR
// vc_engine = engine_combustion ;
2089: LD_ADDR_OWVAR 39
2093: PUSH
2094: LD_INT 1
2096: ST_TO_ADDR
// vc_control = control_manual ;
2097: LD_ADDR_OWVAR 38
2101: PUSH
2102: LD_INT 1
2104: ST_TO_ADDR
// vc_weapon = 4 ;
2105: LD_ADDR_OWVAR 40
2109: PUSH
2110: LD_INT 4
2112: ST_TO_ADDR
// Rv = CreateVehicle ;
2113: LD_ADDR_EXP 12
2117: PUSH
2118: CALL_OW 45
2122: ST_TO_ADDR
// hc_class = 3 ;
2123: LD_ADDR_OWVAR 28
2127: PUSH
2128: LD_INT 3
2130: ST_TO_ADDR
// hc_name =  ;
2131: LD_ADDR_OWVAR 26
2135: PUSH
2136: LD_STRING 
2138: ST_TO_ADDR
// uc_side = 4 ;
2139: LD_ADDR_OWVAR 20
2143: PUSH
2144: LD_INT 4
2146: ST_TO_ADDR
// uc_nation = 1 ;
2147: LD_ADDR_OWVAR 21
2151: PUSH
2152: LD_INT 1
2154: ST_TO_ADDR
// hc_gallery =  ;
2155: LD_ADDR_OWVAR 33
2159: PUSH
2160: LD_STRING 
2162: ST_TO_ADDR
// hc_sex = sex_male ;
2163: LD_ADDR_OWVAR 27
2167: PUSH
2168: LD_INT 1
2170: ST_TO_ADDR
// hc_skills = [ Rand ( 0 , 1 ) , Rand ( 0 , 1 ) , 6 , Rand ( 0 , 1 ) ] ;
2171: LD_ADDR_OWVAR 31
2175: PUSH
2176: LD_INT 0
2178: PPUSH
2179: LD_INT 1
2181: PPUSH
2182: CALL_OW 12
2186: PUSH
2187: LD_INT 0
2189: PPUSH
2190: LD_INT 1
2192: PPUSH
2193: CALL_OW 12
2197: PUSH
2198: LD_INT 6
2200: PUSH
2201: LD_INT 0
2203: PPUSH
2204: LD_INT 1
2206: PPUSH
2207: CALL_OW 12
2211: PUSH
2212: EMPTY
2213: LIST
2214: LIST
2215: LIST
2216: LIST
2217: ST_TO_ADDR
// Rc = CreateHuman ;
2218: LD_ADDR_EXP 13
2222: PUSH
2223: CALL_OW 44
2227: ST_TO_ADDR
// PlaceHumanInUnit ( Rc , Rv ) ;
2228: LD_EXP 13
2232: PPUSH
2233: LD_EXP 12
2237: PPUSH
2238: CALL_OW 52
// PlaceUnitArea ( Rv , TY , false ) ;
2242: LD_EXP 12
2246: PPUSH
2247: LD_INT 1
2249: PPUSH
2250: LD_INT 0
2252: PPUSH
2253: CALL_OW 49
// end ; end_of_file
2257: LD_VAR 0 1
2261: RET
// export cx , cz , sd , sa ; export function WSPARCIE4 ; begin
2262: LD_INT 0
2264: PPUSH
// ; vc_chassis = 3 ;
2265: LD_ADDR_OWVAR 37
2269: PUSH
2270: LD_INT 3
2272: ST_TO_ADDR
// vc_engine = engine_combustion ;
2273: LD_ADDR_OWVAR 39
2277: PUSH
2278: LD_INT 1
2280: ST_TO_ADDR
// vc_control = control_manual ;
2281: LD_ADDR_OWVAR 38
2285: PUSH
2286: LD_INT 1
2288: ST_TO_ADDR
// vc_weapon = 5 ;
2289: LD_ADDR_OWVAR 40
2293: PUSH
2294: LD_INT 5
2296: ST_TO_ADDR
// cx = CreateVehicle ;
2297: LD_ADDR_EXP 14
2301: PUSH
2302: CALL_OW 45
2306: ST_TO_ADDR
// cz = CreateVehicle ;
2307: LD_ADDR_EXP 15
2311: PUSH
2312: CALL_OW 45
2316: ST_TO_ADDR
// hc_class = 3 ;
2317: LD_ADDR_OWVAR 28
2321: PUSH
2322: LD_INT 3
2324: ST_TO_ADDR
// hc_name =  ;
2325: LD_ADDR_OWVAR 26
2329: PUSH
2330: LD_STRING 
2332: ST_TO_ADDR
// uc_side = 4 ;
2333: LD_ADDR_OWVAR 20
2337: PUSH
2338: LD_INT 4
2340: ST_TO_ADDR
// uc_nation = 1 ;
2341: LD_ADDR_OWVAR 21
2345: PUSH
2346: LD_INT 1
2348: ST_TO_ADDR
// hc_gallery =  ;
2349: LD_ADDR_OWVAR 33
2353: PUSH
2354: LD_STRING 
2356: ST_TO_ADDR
// hc_sex = sex_male ;
2357: LD_ADDR_OWVAR 27
2361: PUSH
2362: LD_INT 1
2364: ST_TO_ADDR
// hc_skills = [ Rand ( 0 , 1 ) , Rand ( 0 , 2 ) , 5 , Rand ( 0 , 1 ) ] ;
2365: LD_ADDR_OWVAR 31
2369: PUSH
2370: LD_INT 0
2372: PPUSH
2373: LD_INT 1
2375: PPUSH
2376: CALL_OW 12
2380: PUSH
2381: LD_INT 0
2383: PPUSH
2384: LD_INT 2
2386: PPUSH
2387: CALL_OW 12
2391: PUSH
2392: LD_INT 5
2394: PUSH
2395: LD_INT 0
2397: PPUSH
2398: LD_INT 1
2400: PPUSH
2401: CALL_OW 12
2405: PUSH
2406: EMPTY
2407: LIST
2408: LIST
2409: LIST
2410: LIST
2411: ST_TO_ADDR
// sd = CreateHuman ;
2412: LD_ADDR_EXP 16
2416: PUSH
2417: CALL_OW 44
2421: ST_TO_ADDR
// sa = CreateHuman ;
2422: LD_ADDR_EXP 17
2426: PUSH
2427: CALL_OW 44
2431: ST_TO_ADDR
// PlaceHumanInUnit ( sd , cx ) ;
2432: LD_EXP 16
2436: PPUSH
2437: LD_EXP 14
2441: PPUSH
2442: CALL_OW 52
// PlaceHumanInUnit ( sa , cz ) ;
2446: LD_EXP 17
2450: PPUSH
2451: LD_EXP 15
2455: PPUSH
2456: CALL_OW 52
// PlaceUnitArea ( cx , TY , false ) ;
2460: LD_EXP 14
2464: PPUSH
2465: LD_INT 1
2467: PPUSH
2468: LD_INT 0
2470: PPUSH
2471: CALL_OW 49
// PlaceUnitArea ( cz , TY , false ) ;
2475: LD_EXP 15
2479: PPUSH
2480: LD_INT 1
2482: PPUSH
2483: LD_INT 0
2485: PPUSH
2486: CALL_OW 49
// end ; end_of_file
2490: LD_VAR 0 1
2494: RET
// export OWChyba ; export function PrepareHero1 ; begin
2495: LD_INT 0
2497: PPUSH
// uc_side = 4 ;
2498: LD_ADDR_OWVAR 20
2502: PUSH
2503: LD_INT 4
2505: ST_TO_ADDR
// uc_nation = 1 ;
2506: LD_ADDR_OWVAR 21
2510: PUSH
2511: LD_INT 1
2513: ST_TO_ADDR
// OWCHyba := CreateCharacter ( OWChyba ) ;
2514: LD_ADDR_EXP 18
2518: PUSH
2519: LD_STRING OWChyba
2521: PPUSH
2522: CALL_OW 34
2526: ST_TO_ADDR
// PlaceUnitArea ( OWChyba , TY , false ) ;
2527: LD_EXP 18
2531: PPUSH
2532: LD_INT 1
2534: PPUSH
2535: LD_INT 0
2537: PPUSH
2538: CALL_OW 49
// end ;
2542: LD_VAR 0 1
2546: RET
// export PULK_02 ; export function PrepareHero2 ; begin
2547: LD_INT 0
2549: PPUSH
// uc_side = 4 ;
2550: LD_ADDR_OWVAR 20
2554: PUSH
2555: LD_INT 4
2557: ST_TO_ADDR
// uc_nation = 1 ;
2558: LD_ADDR_OWVAR 21
2562: PUSH
2563: LD_INT 1
2565: ST_TO_ADDR
// PULK_02 := CreateCharacter ( PULK_02 ) ;
2566: LD_ADDR_EXP 19
2570: PUSH
2571: LD_STRING PULK_02
2573: PPUSH
2574: CALL_OW 34
2578: ST_TO_ADDR
// end ; end_of_file
2579: LD_VAR 0 1
2583: RET
// export postac1 , postac2 , postac3 , postac4 , postac5 ; export function American2 ; begin
2584: LD_INT 0
2586: PPUSH
// ; hc_name =  ;
2587: LD_ADDR_OWVAR 26
2591: PUSH
2592: LD_STRING 
2594: ST_TO_ADDR
// uc_nation = nation_American ;
2595: LD_ADDR_OWVAR 21
2599: PUSH
2600: LD_INT 1
2602: ST_TO_ADDR
// hc_class = 1 ;
2603: LD_ADDR_OWVAR 28
2607: PUSH
2608: LD_INT 1
2610: ST_TO_ADDR
// uc_side = 4 ;
2611: LD_ADDR_OWVAR 20
2615: PUSH
2616: LD_INT 4
2618: ST_TO_ADDR
// hc_gallery =  ;
2619: LD_ADDR_OWVAR 33
2623: PUSH
2624: LD_STRING 
2626: ST_TO_ADDR
// hc_attr = [ 10 , 10 ] ;
2627: LD_ADDR_OWVAR 29
2631: PUSH
2632: LD_INT 10
2634: PUSH
2635: LD_INT 10
2637: PUSH
2638: EMPTY
2639: LIST
2640: LIST
2641: ST_TO_ADDR
// hc_basic_skills = [ 5 , 0 , 0 , 0 ] ;
2642: LD_ADDR_OWVAR 30
2646: PUSH
2647: LD_INT 5
2649: PUSH
2650: LD_INT 0
2652: PUSH
2653: LD_INT 0
2655: PUSH
2656: LD_INT 0
2658: PUSH
2659: EMPTY
2660: LIST
2661: LIST
2662: LIST
2663: LIST
2664: ST_TO_ADDR
// hc_importance = 10 ;
2665: LD_ADDR_OWVAR 32
2669: PUSH
2670: LD_INT 10
2672: ST_TO_ADDR
// postac1 = CreateHuman ;
2673: LD_ADDR_EXP 20
2677: PUSH
2678: CALL_OW 44
2682: ST_TO_ADDR
// postac2 = CreateHuman ;
2683: LD_ADDR_EXP 21
2687: PUSH
2688: CALL_OW 44
2692: ST_TO_ADDR
// postac3 = CreateHuman ;
2693: LD_ADDR_EXP 22
2697: PUSH
2698: CALL_OW 44
2702: ST_TO_ADDR
// postac4 = CreateHuman ;
2703: LD_ADDR_EXP 23
2707: PUSH
2708: CALL_OW 44
2712: ST_TO_ADDR
// postac5 = CreateHuman ;
2713: LD_ADDR_EXP 24
2717: PUSH
2718: CALL_OW 44
2722: ST_TO_ADDR
// PlaceUnitArea ( postac1 , TY , false ) ;
2723: LD_EXP 20
2727: PPUSH
2728: LD_INT 1
2730: PPUSH
2731: LD_INT 0
2733: PPUSH
2734: CALL_OW 49
// PlaceUnitArea ( postac2 , TY , false ) ;
2738: LD_EXP 21
2742: PPUSH
2743: LD_INT 1
2745: PPUSH
2746: LD_INT 0
2748: PPUSH
2749: CALL_OW 49
// PlaceUnitArea ( postac3 , TY , false ) ;
2753: LD_EXP 22
2757: PPUSH
2758: LD_INT 1
2760: PPUSH
2761: LD_INT 0
2763: PPUSH
2764: CALL_OW 49
// PlaceUnitArea ( postac4 , TY , false ) ;
2768: LD_EXP 23
2772: PPUSH
2773: LD_INT 1
2775: PPUSH
2776: LD_INT 0
2778: PPUSH
2779: CALL_OW 49
// PlaceUnitArea ( postac5 , TY , false ) ;
2783: LD_EXP 24
2787: PPUSH
2788: LD_INT 1
2790: PPUSH
2791: LD_INT 0
2793: PPUSH
2794: CALL_OW 49
// end ; end_of_file
2798: LD_VAR 0 1
2802: RET
// export med1 , med2 , med3 ; export function American3 ; begin
2803: LD_INT 0
2805: PPUSH
// ; hc_name =  ;
2806: LD_ADDR_OWVAR 26
2810: PUSH
2811: LD_STRING 
2813: ST_TO_ADDR
// uc_nation = nation_American ;
2814: LD_ADDR_OWVAR 21
2818: PUSH
2819: LD_INT 1
2821: ST_TO_ADDR
// hc_class = 4 ;
2822: LD_ADDR_OWVAR 28
2826: PUSH
2827: LD_INT 4
2829: ST_TO_ADDR
// uc_side = 4 ;
2830: LD_ADDR_OWVAR 20
2834: PUSH
2835: LD_INT 4
2837: ST_TO_ADDR
// hc_gallery =  ;
2838: LD_ADDR_OWVAR 33
2842: PUSH
2843: LD_STRING 
2845: ST_TO_ADDR
// hc_attr = [ 10 , 10 ] ;
2846: LD_ADDR_OWVAR 29
2850: PUSH
2851: LD_INT 10
2853: PUSH
2854: LD_INT 10
2856: PUSH
2857: EMPTY
2858: LIST
2859: LIST
2860: ST_TO_ADDR
// hc_basic_skills = [ 0 , Rand ( 0 , 1 ) , Rand ( 0 , 1 ) , Rand ( 3 , 6 ) ] ;
2861: LD_ADDR_OWVAR 30
2865: PUSH
2866: LD_INT 0
2868: PUSH
2869: LD_INT 0
2871: PPUSH
2872: LD_INT 1
2874: PPUSH
2875: CALL_OW 12
2879: PUSH
2880: LD_INT 0
2882: PPUSH
2883: LD_INT 1
2885: PPUSH
2886: CALL_OW 12
2890: PUSH
2891: LD_INT 3
2893: PPUSH
2894: LD_INT 6
2896: PPUSH
2897: CALL_OW 12
2901: PUSH
2902: EMPTY
2903: LIST
2904: LIST
2905: LIST
2906: LIST
2907: ST_TO_ADDR
// hc_importance = 10 ;
2908: LD_ADDR_OWVAR 32
2912: PUSH
2913: LD_INT 10
2915: ST_TO_ADDR
// med1 = CreateHuman ;
2916: LD_ADDR_EXP 25
2920: PUSH
2921: CALL_OW 44
2925: ST_TO_ADDR
// med2 = CreateHuman ;
2926: LD_ADDR_EXP 26
2930: PUSH
2931: CALL_OW 44
2935: ST_TO_ADDR
// med3 = CreateHuman ;
2936: LD_ADDR_EXP 27
2940: PUSH
2941: CALL_OW 44
2945: ST_TO_ADDR
// PlaceUnitArea ( med1 , TY , false ) ;
2946: LD_EXP 25
2950: PPUSH
2951: LD_INT 1
2953: PPUSH
2954: LD_INT 0
2956: PPUSH
2957: CALL_OW 49
// PlaceUnitArea ( med2 , TY , false ) ;
2961: LD_EXP 26
2965: PPUSH
2966: LD_INT 1
2968: PPUSH
2969: LD_INT 0
2971: PPUSH
2972: CALL_OW 49
// PlaceUnitArea ( med3 , TY , false ) ;
2976: LD_EXP 27
2980: PPUSH
2981: LD_INT 1
2983: PPUSH
2984: LD_INT 0
2986: PPUSH
2987: CALL_OW 49
// end ; end_of_file
2991: LD_VAR 0 1
2995: RET
// every 0 0$1 trigger IsDead ( OWChyba ) do
2996: LD_EXP 18
3000: PPUSH
3001: CALL_OW 301
3005: IFFALSE 3017
3007: GO 3009
3009: DISABLE
// begin YouLost ( ded ) ;
3010: LD_STRING ded
3012: PPUSH
3013: CALL_OW 104
// end ;
3017: END
// every 0 0$1 trigger FilterAllUnits ( [ [ f_side , 4 ] , [ f_type , unit_human ] ] ) <= 11 do
3018: LD_INT 22
3020: PUSH
3021: LD_INT 4
3023: PUSH
3024: EMPTY
3025: LIST
3026: LIST
3027: PUSH
3028: LD_INT 21
3030: PUSH
3031: LD_INT 1
3033: PUSH
3034: EMPTY
3035: LIST
3036: LIST
3037: PUSH
3038: EMPTY
3039: LIST
3040: LIST
3041: PPUSH
3042: CALL_OW 69
3046: PUSH
3047: LD_INT 11
3049: LESSEQUAL
3050: IFFALSE 3062
3052: GO 3054
3054: DISABLE
// begin YouLost ( ludzie ) ;
3055: LD_STRING ludzie
3057: PPUSH
3058: CALL_OW 104
// end ; end_of_file
3062: END
// export M1 , M3 , M4 , M6 , med4 , med5 , wsparcieq ; export function WP_01 ; begin
3063: LD_INT 0
3065: PPUSH
// ; vc_chassis = 4 ;
3066: LD_ADDR_OWVAR 37
3070: PUSH
3071: LD_INT 4
3073: ST_TO_ADDR
// vc_engine = engine_combustion ;
3074: LD_ADDR_OWVAR 39
3078: PUSH
3079: LD_INT 1
3081: ST_TO_ADDR
// vc_control = control_manual ;
3082: LD_ADDR_OWVAR 38
3086: PUSH
3087: LD_INT 1
3089: ST_TO_ADDR
// vc_weapon = 5 ;
3090: LD_ADDR_OWVAR 40
3094: PUSH
3095: LD_INT 5
3097: ST_TO_ADDR
// M1 = CreateVehicle ;
3098: LD_ADDR_EXP 28
3102: PUSH
3103: CALL_OW 45
3107: ST_TO_ADDR
// M3 = CreateVehicle ;
3108: LD_ADDR_EXP 29
3112: PUSH
3113: CALL_OW 45
3117: ST_TO_ADDR
// hc_class = 3 ;
3118: LD_ADDR_OWVAR 28
3122: PUSH
3123: LD_INT 3
3125: ST_TO_ADDR
// hc_name =  ;
3126: LD_ADDR_OWVAR 26
3130: PUSH
3131: LD_STRING 
3133: ST_TO_ADDR
// uc_side = 4 ;
3134: LD_ADDR_OWVAR 20
3138: PUSH
3139: LD_INT 4
3141: ST_TO_ADDR
// uc_nation = 1 ;
3142: LD_ADDR_OWVAR 21
3146: PUSH
3147: LD_INT 1
3149: ST_TO_ADDR
// hc_gallery =  ;
3150: LD_ADDR_OWVAR 33
3154: PUSH
3155: LD_STRING 
3157: ST_TO_ADDR
// hc_sex = sex_male ;
3158: LD_ADDR_OWVAR 27
3162: PUSH
3163: LD_INT 1
3165: ST_TO_ADDR
// hc_skills = [ 1 , Rand ( 0 , 4 ) , Rand ( 4 , 6 ) , 0 ] ;
3166: LD_ADDR_OWVAR 31
3170: PUSH
3171: LD_INT 1
3173: PUSH
3174: LD_INT 0
3176: PPUSH
3177: LD_INT 4
3179: PPUSH
3180: CALL_OW 12
3184: PUSH
3185: LD_INT 4
3187: PPUSH
3188: LD_INT 6
3190: PPUSH
3191: CALL_OW 12
3195: PUSH
3196: LD_INT 0
3198: PUSH
3199: EMPTY
3200: LIST
3201: LIST
3202: LIST
3203: LIST
3204: ST_TO_ADDR
// M4 = CreateHuman ;
3205: LD_ADDR_EXP 30
3209: PUSH
3210: CALL_OW 44
3214: ST_TO_ADDR
// M6 = CreateHuman ;
3215: LD_ADDR_EXP 31
3219: PUSH
3220: CALL_OW 44
3224: ST_TO_ADDR
// PlaceHumanInUnit ( M4 , M3 ) ;
3225: LD_EXP 30
3229: PPUSH
3230: LD_EXP 29
3234: PPUSH
3235: CALL_OW 52
// PlaceHumanInUnit ( M6 , M1 ) ;
3239: LD_EXP 31
3243: PPUSH
3244: LD_EXP 28
3248: PPUSH
3249: CALL_OW 52
// PlaceUnitArea ( M1 , TY , false ) ;
3253: LD_EXP 28
3257: PPUSH
3258: LD_INT 1
3260: PPUSH
3261: LD_INT 0
3263: PPUSH
3264: CALL_OW 49
// PlaceUnitArea ( M3 , Ty , false ) ;
3268: LD_EXP 29
3272: PPUSH
3273: LD_INT 1
3275: PPUSH
3276: LD_INT 0
3278: PPUSH
3279: CALL_OW 49
// hc_name =  ;
3283: LD_ADDR_OWVAR 26
3287: PUSH
3288: LD_STRING 
3290: ST_TO_ADDR
// uc_nation = nation_American ;
3291: LD_ADDR_OWVAR 21
3295: PUSH
3296: LD_INT 1
3298: ST_TO_ADDR
// hc_class = 1 ;
3299: LD_ADDR_OWVAR 28
3303: PUSH
3304: LD_INT 1
3306: ST_TO_ADDR
// uc_side = 4 ;
3307: LD_ADDR_OWVAR 20
3311: PUSH
3312: LD_INT 4
3314: ST_TO_ADDR
// hc_gallery =  ;
3315: LD_ADDR_OWVAR 33
3319: PUSH
3320: LD_STRING 
3322: ST_TO_ADDR
// hc_attr = [ 10 , 10 ] ;
3323: LD_ADDR_OWVAR 29
3327: PUSH
3328: LD_INT 10
3330: PUSH
3331: LD_INT 10
3333: PUSH
3334: EMPTY
3335: LIST
3336: LIST
3337: ST_TO_ADDR
// hc_basic_skills = [ Rand ( 4 , 5 ) , Rand ( 0 , 2 ) , Rand ( 0 , 1 ) , 0 ] ;
3338: LD_ADDR_OWVAR 30
3342: PUSH
3343: LD_INT 4
3345: PPUSH
3346: LD_INT 5
3348: PPUSH
3349: CALL_OW 12
3353: PUSH
3354: LD_INT 0
3356: PPUSH
3357: LD_INT 2
3359: PPUSH
3360: CALL_OW 12
3364: PUSH
3365: LD_INT 0
3367: PPUSH
3368: LD_INT 1
3370: PPUSH
3371: CALL_OW 12
3375: PUSH
3376: LD_INT 0
3378: PUSH
3379: EMPTY
3380: LIST
3381: LIST
3382: LIST
3383: LIST
3384: ST_TO_ADDR
// hc_importance = 10 ;
3385: LD_ADDR_OWVAR 32
3389: PUSH
3390: LD_INT 10
3392: ST_TO_ADDR
// med4 = CreateHuman ;
3393: LD_ADDR_EXP 32
3397: PUSH
3398: CALL_OW 44
3402: ST_TO_ADDR
// med5 = CreateHuman ;
3403: LD_ADDR_EXP 33
3407: PUSH
3408: CALL_OW 44
3412: ST_TO_ADDR
// PlaceUnitArea ( med4 , TY , false ) ;
3413: LD_EXP 32
3417: PPUSH
3418: LD_INT 1
3420: PPUSH
3421: LD_INT 0
3423: PPUSH
3424: CALL_OW 49
// PlaceUnitArea ( med5 , TY , false ) ;
3428: LD_EXP 33
3432: PPUSH
3433: LD_INT 1
3435: PPUSH
3436: LD_INT 0
3438: PPUSH
3439: CALL_OW 49
// end ; end_of_file
3443: LD_VAR 0 1
3447: RET
// export function Medale ; begin
3448: LD_INT 0
3450: PPUSH
// if FilterAllUnits ( [ [ f_side , 4 ] , [ f_type , unit_human ] ] ) > 11 then
3451: LD_INT 22
3453: PUSH
3454: LD_INT 4
3456: PUSH
3457: EMPTY
3458: LIST
3459: LIST
3460: PUSH
3461: LD_INT 21
3463: PUSH
3464: LD_INT 1
3466: PUSH
3467: EMPTY
3468: LIST
3469: LIST
3470: PUSH
3471: EMPTY
3472: LIST
3473: LIST
3474: PPUSH
3475: CALL_OW 69
3479: PUSH
3480: LD_INT 11
3482: GREATER
3483: IFFALSE 3497
// begin AddMedal ( med1 , 1 ) ;
3485: LD_STRING med1
3487: PPUSH
3488: LD_INT 1
3490: PPUSH
3491: CALL_OW 101
// end else
3495: GO 3508
// begin AddMedal ( med1 , - 1 ) ;
3497: LD_STRING med1
3499: PPUSH
3500: LD_INT 1
3502: NEG
3503: PPUSH
3504: CALL_OW 101
// end ; if WsparcieQ = 2 then
3508: LD_EXP 34
3512: PUSH
3513: LD_INT 2
3515: EQUAL
3516: IFFALSE 3530
// begin AddMedal ( med2 , 1 ) ;
3518: LD_STRING med2
3520: PPUSH
3521: LD_INT 1
3523: PPUSH
3524: CALL_OW 101
// end else
3528: GO 3551
// if WsparcieQ = 1 then
3530: LD_EXP 34
3534: PUSH
3535: LD_INT 1
3537: EQUAL
3538: IFFALSE 3551
// begin AddMedal ( med2 , - 1 ) ;
3540: LD_STRING med2
3542: PPUSH
3543: LD_INT 1
3545: NEG
3546: PPUSH
3547: CALL_OW 101
// end ; if FilterAllUnits ( [ [ f_side , 6 ] , [ f_type , unit_building ] ] ) = 0 then
3551: LD_INT 22
3553: PUSH
3554: LD_INT 6
3556: PUSH
3557: EMPTY
3558: LIST
3559: LIST
3560: PUSH
3561: LD_INT 21
3563: PUSH
3564: LD_INT 3
3566: PUSH
3567: EMPTY
3568: LIST
3569: LIST
3570: PUSH
3571: EMPTY
3572: LIST
3573: LIST
3574: PPUSH
3575: CALL_OW 69
3579: PUSH
3580: LD_INT 0
3582: EQUAL
3583: IFFALSE 3597
// begin AddMedal ( med3 , 1 ) ;
3585: LD_STRING med3
3587: PPUSH
3588: LD_INT 1
3590: PPUSH
3591: CALL_OW 101
// end else
3595: GO 3608
// begin AddMedal ( med3 , - 1 ) ;
3597: LD_STRING med3
3599: PPUSH
3600: LD_INT 1
3602: NEG
3603: PPUSH
3604: CALL_OW 101
// end ; GiveMedals ( MAIN ) ;
3608: LD_STRING MAIN
3610: PPUSH
3611: CALL_OW 102
// end ; end_of_file
3615: LD_VAR 0 1
3619: RET
// export Timer ; starting begin ; disable ( 50 ) ;
3620: LD_INT 50
3622: DISABLE_MARKED
// setcargo ( C1 , mat_oil , 100 ) ;
3623: LD_INT 352
3625: PPUSH
3626: LD_INT 2
3628: PPUSH
3629: LD_INT 100
3631: PPUSH
3632: CALL_OW 290
// setcargo ( C2 , mat_oil , 100 ) ;
3636: LD_INT 356
3638: PPUSH
3639: LD_INT 2
3641: PPUSH
3642: LD_INT 100
3644: PPUSH
3645: CALL_OW 290
// setcargo ( C3 , mat_oil , 100 ) ;
3649: LD_INT 395
3651: PPUSH
3652: LD_INT 2
3654: PPUSH
3655: LD_INT 100
3657: PPUSH
3658: CALL_OW 290
// disable ( 105 ) ;
3662: LD_INT 105
3664: DISABLE_MARKED
// Czasc = false ;
3665: LD_ADDR_EXP 1
3669: PUSH
3670: LD_INT 0
3672: ST_TO_ADDR
// Difficulties ;
3673: CALL 4688 0 0
// PrepareRussian ;
3677: CALL 61 0 0
// PrepareHero1 ;
3681: CALL 2495 0 0
// PrepareHero2 ;
3685: CALL 2547 0 0
// WSPARCIE1 ;
3689: CALL 1669 0 0
// WSPARCIE2 ;
3693: CALL 1886 0 0
// WSPARCIE3 ;
3697: CALL 2078 0 0
// WSPARCIE4 ;
3701: CALL 2262 0 0
// American2 ;
3705: CALL 2584 0 0
// American3 ;
3709: CALL 2803 0 0
// resetfog ;
3713: CALL_OW 335
// SetClass ( OWChyba , 1 ) ;
3717: LD_EXP 18
3721: PPUSH
3722: LD_INT 1
3724: PPUSH
3725: CALL_OW 336
// InGameOn ;
3729: CALL_OW 8
// SayRadio ( PULK_02 , w40 ) ;
3733: LD_EXP 19
3737: PPUSH
3738: LD_STRING w40
3740: PPUSH
3741: CALL_OW 94
// Say ( OWChyba , w39 ) ;
3745: LD_EXP 18
3749: PPUSH
3750: LD_STRING w39
3752: PPUSH
3753: CALL_OW 88
// InGameOff ;
3757: CALL_OW 9
// ChangeMissionObjectives ( M1 ) ;
3761: LD_STRING M1
3763: PPUSH
3764: CALL_OW 337
// SaveForQuickRestart ;
3768: CALL_OW 22
// Czasc = true ;
3772: LD_ADDR_EXP 1
3776: PUSH
3777: LD_INT 1
3779: ST_TO_ADDR
// wait ( 27 27$00 ) ;
3780: LD_INT 56700
3782: PPUSH
3783: CALL_OW 67
// SayRadio ( PULK_02 , w41 ) ;
3787: LD_EXP 19
3791: PPUSH
3792: LD_STRING w41
3794: PPUSH
3795: CALL_OW 94
// SayRadio ( OWChyba , w42 ) ;
3799: LD_EXP 18
3803: PPUSH
3804: LD_STRING w42
3806: PPUSH
3807: CALL_OW 94
// SayRadio ( PULK_02 , w43 ) ;
3811: LD_EXP 19
3815: PPUSH
3816: LD_STRING w43
3818: PPUSH
3819: CALL_OW 94
// case Query ( Wsparcie ) of 1 :
3823: LD_STRING Wsparcie
3825: PPUSH
3826: CALL_OW 97
3830: PUSH
3831: LD_INT 1
3833: DOUBLE
3834: EQUAL
3835: IFTRUE 3839
3837: GO 3885
3839: POP
// begin wsparcieq = 1 ;
3840: LD_ADDR_EXP 34
3844: PUSH
3845: LD_INT 1
3847: ST_TO_ADDR
// SayRadio ( OWChyba , w44a ) ;
3848: LD_EXP 18
3852: PPUSH
3853: LD_STRING w44a
3855: PPUSH
3856: CALL_OW 94
// SayRadio ( PULK_02 , w44b ) ;
3860: LD_EXP 19
3864: PPUSH
3865: LD_STRING w44b
3867: PPUSH
3868: CALL_OW 94
// wait ( 5 5$00 ) ;
3872: LD_INT 10500
3874: PPUSH
3875: CALL_OW 67
// WP_01 ;
3879: CALL 3063 0 0
// end ; 2 :
3883: GO 3929
3885: LD_INT 2
3887: DOUBLE
3888: EQUAL
3889: IFTRUE 3893
3891: GO 3928
3893: POP
// begin wsparcieq = 2 ;
3894: LD_ADDR_EXP 34
3898: PUSH
3899: LD_INT 2
3901: ST_TO_ADDR
// SayRadio ( OWChyba , w45a ) ;
3902: LD_EXP 18
3906: PPUSH
3907: LD_STRING w45a
3909: PPUSH
3910: CALL_OW 94
// SayRadio ( PULK_02 , w45b ) ;
3914: LD_EXP 19
3918: PPUSH
3919: LD_STRING w45b
3921: PPUSH
3922: CALL_OW 94
// end ; end ;
3926: GO 3929
3928: POP
// end ;
3929: END
// every 0 0$01 marked 200 do
3930: GO 3932
3932: DISABLE
// begin enable ;
3933: ENABLE
// if Timer = 50 50$0 then
3934: LD_EXP 35
3938: PUSH
3939: LD_INT 105000
3941: EQUAL
3942: IFFALSE 4083
// begin disable ( 200 ) ;
3944: LD_INT 200
3946: DISABLE_MARKED
// SayRadio ( PULK_02 , w46 ) ;
3947: LD_EXP 19
3951: PPUSH
3952: LD_STRING w46
3954: PPUSH
3955: CALL_OW 94
// SayRadio ( OWChyba , w47 ) ;
3959: LD_EXP 18
3963: PPUSH
3964: LD_STRING w47
3966: PPUSH
3967: CALL_OW 94
// SayRadio ( PULK_02 , w48 ) ;
3971: LD_EXP 19
3975: PPUSH
3976: LD_STRING w48
3978: PPUSH
3979: CALL_OW 94
// SayRadio ( OWChyba , w49 ) ;
3983: LD_EXP 18
3987: PPUSH
3988: LD_STRING w49
3990: PPUSH
3991: CALL_OW 94
// if Wsparcieq = 1 then
3995: LD_EXP 34
3999: PUSH
4000: LD_INT 1
4002: EQUAL
4003: IFFALSE 4045
// begin SayRadio ( PULK_02 , w50a ) ;
4005: LD_EXP 19
4009: PPUSH
4010: LD_STRING w50a
4012: PPUSH
4013: CALL_OW 94
// SayRadio ( OWChyba , w51 ) ;
4017: LD_EXP 18
4021: PPUSH
4022: LD_STRING w51
4024: PPUSH
4025: CALL_OW 94
// wait ( 5 5$0 ) ;
4029: LD_INT 10500
4031: PPUSH
4032: CALL_OW 67
// YouLost ( Zadanie ) ;
4036: LD_STRING Zadanie
4038: PPUSH
4039: CALL_OW 104
// end else
4043: GO 4083
// begin SayRadio ( PULK_02 , w50b ) ;
4045: LD_EXP 19
4049: PPUSH
4050: LD_STRING w50b
4052: PPUSH
4053: CALL_OW 94
// SayRadio ( OWChyba , w51 ) ;
4057: LD_EXP 18
4061: PPUSH
4062: LD_STRING w51
4064: PPUSH
4065: CALL_OW 94
// wait ( 13 13$0 ) ;
4069: LD_INT 27300
4071: PPUSH
4072: CALL_OW 67
// YouLost ( Zadanie ) ;
4076: LD_STRING Zadanie
4078: PPUSH
4079: CALL_OW 104
// end ; end ; end ;
4083: END
// every 0 0$01 trigger ISDead ( lab1 ) and IsDead ( lab2 ) and IsDead ( lab3 ) and IsDead ( lab4 ) and IsDead ( lab7 ) and IsDead ( lab6 ) and IsDead ( lab5 ) and IsDead ( fabryka1 ) and IsDead ( Fabryka2 ) and IsDead ( Depot1 ) and IsDead ( Depot2 ) and IsDead ( Depot3 ) do
4084: LD_INT 211
4086: PPUSH
4087: CALL_OW 301
4091: PUSH
4092: LD_INT 196
4094: PPUSH
4095: CALL_OW 301
4099: AND
4100: PUSH
4101: LD_INT 190
4103: PPUSH
4104: CALL_OW 301
4108: AND
4109: PUSH
4110: LD_INT 204
4112: PPUSH
4113: CALL_OW 301
4117: AND
4118: PUSH
4119: LD_INT 75
4121: PPUSH
4122: CALL_OW 301
4126: AND
4127: PUSH
4128: LD_INT 131
4130: PPUSH
4131: CALL_OW 301
4135: AND
4136: PUSH
4137: LD_INT 214
4139: PPUSH
4140: CALL_OW 301
4144: AND
4145: PUSH
4146: LD_INT 104
4148: PPUSH
4149: CALL_OW 301
4153: AND
4154: PUSH
4155: LD_INT 112
4157: PPUSH
4158: CALL_OW 301
4162: AND
4163: PUSH
4164: LD_INT 98
4166: PPUSH
4167: CALL_OW 301
4171: AND
4172: PUSH
4173: LD_INT 127
4175: PPUSH
4176: CALL_OW 301
4180: AND
4181: PUSH
4182: LD_INT 183
4184: PPUSH
4185: CALL_OW 301
4189: AND
4190: IFFALSE 4227
4192: GO 4194
4194: DISABLE
// begin Say ( OWChyba , Z1 ) ;
4195: LD_EXP 18
4199: PPUSH
4200: LD_STRING Z1
4202: PPUSH
4203: CALL_OW 88
// SetAreaMapShow ( UCIECZKA , 1 ) ;
4207: LD_INT 2
4209: PPUSH
4210: LD_INT 1
4212: PPUSH
4213: CALL_OW 424
// ChangeMissionObjectives ( M2 ) ;
4217: LD_STRING M2
4219: PPUSH
4220: CALL_OW 337
// enable ( 105 ) ;
4224: LD_INT 105
4226: ENABLE_MARKED
// end ;
4227: END
// every 0 0$01 trigger IsInArea ( OWChyba , UCIECZKA ) marked 105 do
4228: LD_EXP 18
4232: PPUSH
4233: LD_INT 2
4235: PPUSH
4236: CALL_OW 308
4240: IFFALSE 4501
4242: GO 4244
4244: DISABLE
// begin ; InGameOn ;
4245: CALL_OW 8
// SayRadio ( OWChyba , w52 ) ;
4249: LD_EXP 18
4253: PPUSH
4254: LD_STRING w52
4256: PPUSH
4257: CALL_OW 94
// SaveCharacters ( AM4 , AM4 ) ;
4261: LD_EXP 8
4265: PPUSH
4266: LD_STRING AM4
4268: PPUSH
4269: CALL_OW 38
// SaveCharacters ( AM6 , AM6 ) ;
4273: LD_EXP 9
4277: PPUSH
4278: LD_STRING AM6
4280: PPUSH
4281: CALL_OW 38
// SaveCharacters ( R2 , R2 ) ;
4285: LD_EXP 11
4289: PPUSH
4290: LD_STRING R2
4292: PPUSH
4293: CALL_OW 38
// SaveCharacters ( Rc , Rc ) ;
4297: LD_EXP 13
4301: PPUSH
4302: LD_STRING Rc
4304: PPUSH
4305: CALL_OW 38
// SaveCharacters ( sa , sa ) ;
4309: LD_EXP 17
4313: PPUSH
4314: LD_STRING sa
4316: PPUSH
4317: CALL_OW 38
// SaveCharacters ( sd , sd ) ;
4321: LD_EXP 16
4325: PPUSH
4326: LD_STRING sd
4328: PPUSH
4329: CALL_OW 38
// SaveCharacters ( postac1 , postac1 ) ;
4333: LD_EXP 20
4337: PPUSH
4338: LD_STRING postac1
4340: PPUSH
4341: CALL_OW 38
// SaveCharacters ( postac2 , postac2 ) ;
4345: LD_EXP 21
4349: PPUSH
4350: LD_STRING postac2
4352: PPUSH
4353: CALL_OW 38
// SaveCharacters ( postac3 , postac3 ) ;
4357: LD_EXP 22
4361: PPUSH
4362: LD_STRING postac3
4364: PPUSH
4365: CALL_OW 38
// SaveCharacters ( postac4 , postac4 ) ;
4369: LD_EXP 23
4373: PPUSH
4374: LD_STRING postac4
4376: PPUSH
4377: CALL_OW 38
// SaveCharacters ( postac5 , postac5 ) ;
4381: LD_EXP 24
4385: PPUSH
4386: LD_STRING postac5
4388: PPUSH
4389: CALL_OW 38
// SaveCharacters ( postac3 , postac3 ) ;
4393: LD_EXP 22
4397: PPUSH
4398: LD_STRING postac3
4400: PPUSH
4401: CALL_OW 38
// SaveCharacters ( med1 , med1 ) ;
4405: LD_EXP 25
4409: PPUSH
4410: LD_STRING med1
4412: PPUSH
4413: CALL_OW 38
// SaveCharacters ( med2 , med2 ) ;
4417: LD_EXP 26
4421: PPUSH
4422: LD_STRING med2
4424: PPUSH
4425: CALL_OW 38
// SaveCharacters ( med3 , med3 ) ;
4429: LD_EXP 27
4433: PPUSH
4434: LD_STRING med3
4436: PPUSH
4437: CALL_OW 38
// SaveCharacters ( M4 , M4 ) ;
4441: LD_EXP 30
4445: PPUSH
4446: LD_STRING M4
4448: PPUSH
4449: CALL_OW 38
// SaveCharacters ( M6 , M6 ) ;
4453: LD_EXP 31
4457: PPUSH
4458: LD_STRING M6
4460: PPUSH
4461: CALL_OW 38
// SaveCharacters ( med4 , med4 ) ;
4465: LD_EXP 32
4469: PPUSH
4470: LD_STRING med4
4472: PPUSH
4473: CALL_OW 38
// SaveCharacters ( med5 , med5 ) ;
4477: LD_EXP 33
4481: PPUSH
4482: LD_STRING med5
4484: PPUSH
4485: CALL_OW 38
// Save_Vehicles ;
4489: CALL 4502 0 0
// medale ;
4493: CALL 3448 0 0
// youwin ;
4497: CALL_OW 103
// end ; end_of_file
4501: END
// export function Save_Vehicles ; var filter , i , tab ; begin
4502: LD_INT 0
4504: PPUSH
4505: PPUSH
4506: PPUSH
4507: PPUSH
// tab := [ ] ;
4508: LD_ADDR_VAR 0 4
4512: PUSH
4513: EMPTY
4514: ST_TO_ADDR
// filter := FilterAllUnits ( [ [ f_side , 4 ] , [ f_type , unit_vehicle ] ] ) ;
4515: LD_ADDR_VAR 0 2
4519: PUSH
4520: LD_INT 22
4522: PUSH
4523: LD_INT 4
4525: PUSH
4526: EMPTY
4527: LIST
4528: LIST
4529: PUSH
4530: LD_INT 21
4532: PUSH
4533: LD_INT 2
4535: PUSH
4536: EMPTY
4537: LIST
4538: LIST
4539: PUSH
4540: EMPTY
4541: LIST
4542: LIST
4543: PPUSH
4544: CALL_OW 69
4548: ST_TO_ADDR
// for i = 1 to filter do
4549: LD_ADDR_VAR 0 3
4553: PUSH
4554: DOUBLE
4555: LD_INT 1
4557: DEC
4558: ST_TO_ADDR
4559: LD_VAR 0 2
4563: PUSH
4564: FOR_TO
4565: IFFALSE 4650
// begin tab := tab ^ [ GetChassis ( filter [ i ] ) , GetEngine ( filter [ i ] ) , GetControl ( filter [ i ] ) , GetWeapon ( filter [ i ] ) ] ;
4567: LD_ADDR_VAR 0 4
4571: PUSH
4572: LD_VAR 0 4
4576: PUSH
4577: LD_VAR 0 2
4581: PUSH
4582: LD_VAR 0 3
4586: ARRAY
4587: PPUSH
4588: CALL_OW 265
4592: PUSH
4593: LD_VAR 0 2
4597: PUSH
4598: LD_VAR 0 3
4602: ARRAY
4603: PPUSH
4604: CALL_OW 262
4608: PUSH
4609: LD_VAR 0 2
4613: PUSH
4614: LD_VAR 0 3
4618: ARRAY
4619: PPUSH
4620: CALL_OW 263
4624: PUSH
4625: LD_VAR 0 2
4629: PUSH
4630: LD_VAR 0 3
4634: ARRAY
4635: PPUSH
4636: CALL_OW 264
4640: PUSH
4641: EMPTY
4642: LIST
4643: LIST
4644: LIST
4645: LIST
4646: ADD
4647: ST_TO_ADDR
// end ;
4648: GO 4564
4650: POP
4651: POP
// SaveVariable ( tab , unit_vehs ) ;
4652: LD_VAR 0 4
4656: PPUSH
4657: LD_STRING unit_vehs
4659: PPUSH
4660: CALL_OW 39
// end ; end_of_file
4664: LD_VAR 0 1
4668: RET
// every 0 0$01 do
4669: GO 4671
4671: DISABLE
// begin Timer = timer + 0 0$01 ;
4672: LD_ADDR_EXP 35
4676: PUSH
4677: LD_EXP 35
4681: PUSH
4682: LD_INT 35
4684: PLUS
4685: ST_TO_ADDR
// enable ;
4686: ENABLE
// end ; end_of_file
4687: END
// export function Difficulties ; var Level ; begin
4688: LD_INT 0
4690: PPUSH
4691: PPUSH
// Level = [ 1 , 2 , 3 ] [ Difficulty ] ;
4692: LD_ADDR_VAR 0 2
4696: PUSH
4697: LD_INT 1
4699: PUSH
4700: LD_INT 2
4702: PUSH
4703: LD_INT 3
4705: PUSH
4706: EMPTY
4707: LIST
4708: LIST
4709: LIST
4710: PUSH
4711: LD_OWVAR 67
4715: ARRAY
4716: ST_TO_ADDR
// case Level of 1 :
4717: LD_VAR 0 2
4721: PUSH
4722: LD_INT 1
4724: DOUBLE
4725: EQUAL
4726: IFTRUE 4730
4728: GO 4863
4730: POP
// begin SetTech ( 48 , 4 , state_Researched ) ;
4731: LD_INT 48
4733: PPUSH
4734: LD_INT 4
4736: PPUSH
4737: LD_INT 2
4739: PPUSH
4740: CALL_OW 322
// SetTech ( 49 , 4 , state_Researched ) ;
4744: LD_INT 49
4746: PPUSH
4747: LD_INT 4
4749: PPUSH
4750: LD_INT 2
4752: PPUSH
4753: CALL_OW 322
// SetTech ( 51 , 4 , state_Researched ) ;
4757: LD_INT 51
4759: PPUSH
4760: LD_INT 4
4762: PPUSH
4763: LD_INT 2
4765: PPUSH
4766: CALL_OW 322
// SetTech ( 52 , 4 , state_Researched ) ;
4770: LD_INT 52
4772: PPUSH
4773: LD_INT 4
4775: PPUSH
4776: LD_INT 2
4778: PPUSH
4779: CALL_OW 322
// SetTech ( 60 , 4 , state_Researched ) ;
4783: LD_INT 60
4785: PPUSH
4786: LD_INT 4
4788: PPUSH
4789: LD_INT 2
4791: PPUSH
4792: CALL_OW 322
// SetTech ( 48 , 6 , state_Researched ) ;
4796: LD_INT 48
4798: PPUSH
4799: LD_INT 6
4801: PPUSH
4802: LD_INT 2
4804: PPUSH
4805: CALL_OW 322
// SetTech ( 49 , 6 , state_Researched ) ;
4809: LD_INT 49
4811: PPUSH
4812: LD_INT 6
4814: PPUSH
4815: LD_INT 2
4817: PPUSH
4818: CALL_OW 322
// SetTech ( 51 , 6 , state_Researched ) ;
4822: LD_INT 51
4824: PPUSH
4825: LD_INT 6
4827: PPUSH
4828: LD_INT 2
4830: PPUSH
4831: CALL_OW 322
// SetTech ( 52 , 6 , state_Researched ) ;
4835: LD_INT 52
4837: PPUSH
4838: LD_INT 6
4840: PPUSH
4841: LD_INT 2
4843: PPUSH
4844: CALL_OW 322
// SetTech ( 57 , 6 , state_Researched ) ;
4848: LD_INT 57
4850: PPUSH
4851: LD_INT 6
4853: PPUSH
4854: LD_INT 2
4856: PPUSH
4857: CALL_OW 322
// end ; 2 :
4861: GO 5120
4863: LD_INT 2
4865: DOUBLE
4866: EQUAL
4867: IFTRUE 4871
4869: GO 4978
4871: POP
// begin SetTech ( 48 , 4 , state_Researched ) ;
4872: LD_INT 48
4874: PPUSH
4875: LD_INT 4
4877: PPUSH
4878: LD_INT 2
4880: PPUSH
4881: CALL_OW 322
// SetTech ( 51 , 4 , state_Researched ) ;
4885: LD_INT 51
4887: PPUSH
4888: LD_INT 4
4890: PPUSH
4891: LD_INT 2
4893: PPUSH
4894: CALL_OW 322
// SetTech ( 60 , 4 , state_Researched ) ;
4898: LD_INT 60
4900: PPUSH
4901: LD_INT 4
4903: PPUSH
4904: LD_INT 2
4906: PPUSH
4907: CALL_OW 322
// SetTech ( 48 , 6 , state_Researched ) ;
4911: LD_INT 48
4913: PPUSH
4914: LD_INT 6
4916: PPUSH
4917: LD_INT 2
4919: PPUSH
4920: CALL_OW 322
// SetTech ( 49 , 6 , state_Researched ) ;
4924: LD_INT 49
4926: PPUSH
4927: LD_INT 6
4929: PPUSH
4930: LD_INT 2
4932: PPUSH
4933: CALL_OW 322
// SetTech ( 51 , 6 , state_Researched ) ;
4937: LD_INT 51
4939: PPUSH
4940: LD_INT 6
4942: PPUSH
4943: LD_INT 2
4945: PPUSH
4946: CALL_OW 322
// SetTech ( 52 , 6 , state_Researched ) ;
4950: LD_INT 52
4952: PPUSH
4953: LD_INT 6
4955: PPUSH
4956: LD_INT 2
4958: PPUSH
4959: CALL_OW 322
// SetTech ( 57 , 6 , state_Researched ) ;
4963: LD_INT 57
4965: PPUSH
4966: LD_INT 6
4968: PPUSH
4969: LD_INT 2
4971: PPUSH
4972: CALL_OW 322
// end ; 3 :
4976: GO 5120
4978: LD_INT 3
4980: DOUBLE
4981: EQUAL
4982: IFTRUE 4986
4984: GO 5119
4986: POP
// begin SetTech ( 48 , 4 , state_Researched ) ;
4987: LD_INT 48
4989: PPUSH
4990: LD_INT 4
4992: PPUSH
4993: LD_INT 2
4995: PPUSH
4996: CALL_OW 322
// SetTech ( 51 , 4 , state_Researched ) ;
5000: LD_INT 51
5002: PPUSH
5003: LD_INT 4
5005: PPUSH
5006: LD_INT 2
5008: PPUSH
5009: CALL_OW 322
// SetTech ( 60 , 4 , state_Researched ) ;
5013: LD_INT 60
5015: PPUSH
5016: LD_INT 4
5018: PPUSH
5019: LD_INT 2
5021: PPUSH
5022: CALL_OW 322
// SetTech ( 48 , 6 , state_Researched ) ;
5026: LD_INT 48
5028: PPUSH
5029: LD_INT 6
5031: PPUSH
5032: LD_INT 2
5034: PPUSH
5035: CALL_OW 322
// SetTech ( 49 , 6 , state_Researched ) ;
5039: LD_INT 49
5041: PPUSH
5042: LD_INT 6
5044: PPUSH
5045: LD_INT 2
5047: PPUSH
5048: CALL_OW 322
// SetTech ( 50 , 6 , state_Researched ) ;
5052: LD_INT 50
5054: PPUSH
5055: LD_INT 6
5057: PPUSH
5058: LD_INT 2
5060: PPUSH
5061: CALL_OW 322
// SetTech ( 51 , 6 , state_Researched ) ;
5065: LD_INT 51
5067: PPUSH
5068: LD_INT 6
5070: PPUSH
5071: LD_INT 2
5073: PPUSH
5074: CALL_OW 322
// SetTech ( 52 , 6 , state_Researched ) ;
5078: LD_INT 52
5080: PPUSH
5081: LD_INT 6
5083: PPUSH
5084: LD_INT 2
5086: PPUSH
5087: CALL_OW 322
// SetTech ( 57 , 6 , state_Researched ) ;
5091: LD_INT 57
5093: PPUSH
5094: LD_INT 6
5096: PPUSH
5097: LD_INT 2
5099: PPUSH
5100: CALL_OW 322
// SetTech ( 58 , 6 , state_Researched ) ;
5104: LD_INT 58
5106: PPUSH
5107: LD_INT 6
5109: PPUSH
5110: LD_INT 2
5112: PPUSH
5113: CALL_OW 322
// end ; end ;
5117: GO 5120
5119: POP
// end ; end_of_file
5120: LD_VAR 0 1
5124: RET
// every 1 1$30 trigger FilterAllUnits ( [ [ f_side , 6 ] , [ f_type , unit_vehicle ] , [ f_control , Control_Computer ] ] ) = 0 do var Level ;
5125: LD_INT 22
5127: PUSH
5128: LD_INT 6
5130: PUSH
5131: EMPTY
5132: LIST
5133: LIST
5134: PUSH
5135: LD_INT 21
5137: PUSH
5138: LD_INT 2
5140: PUSH
5141: EMPTY
5142: LIST
5143: LIST
5144: PUSH
5145: LD_INT 33
5147: PUSH
5148: LD_INT 3
5150: PUSH
5151: EMPTY
5152: LIST
5153: LIST
5154: PUSH
5155: EMPTY
5156: LIST
5157: LIST
5158: LIST
5159: PPUSH
5160: CALL_OW 69
5164: PUSH
5165: LD_INT 0
5167: EQUAL
5168: IFFALSE 5393
5170: GO 5172
5172: DISABLE
5173: LD_INT 0
5175: PPUSH
// begin enable ;
5176: ENABLE
// Level = [ 1 , 2 , 3 ] [ Difficulty ] ;
5177: LD_ADDR_VAR 0 1
5181: PUSH
5182: LD_INT 1
5184: PUSH
5185: LD_INT 2
5187: PUSH
5188: LD_INT 3
5190: PUSH
5191: EMPTY
5192: LIST
5193: LIST
5194: LIST
5195: PUSH
5196: LD_OWVAR 67
5200: ARRAY
5201: ST_TO_ADDR
// case Level of 1 :
5202: LD_VAR 0 1
5206: PUSH
5207: LD_INT 1
5209: DOUBLE
5210: EQUAL
5211: IFTRUE 5215
5213: GO 5256
5215: POP
// begin AddComConstruct ( fabryka1 , ru_medium_tracked , engine_combustion , control_computer , ru_gun ) ;
5216: LD_INT 104
5218: PPUSH
5219: LD_INT 22
5221: PPUSH
5222: LD_INT 1
5224: PPUSH
5225: LD_INT 3
5227: PPUSH
5228: LD_INT 44
5230: PPUSH
5231: CALL_OW 185
// AddComConstruct ( fabryka2 , ru_medium_tracked , engine_combustion , control_computer , ru_gatling_gun ) ;
5235: LD_INT 112
5237: PPUSH
5238: LD_INT 22
5240: PPUSH
5241: LD_INT 1
5243: PPUSH
5244: LD_INT 3
5246: PPUSH
5247: LD_INT 43
5249: PPUSH
5250: CALL_OW 185
// end ; 2 :
5254: GO 5393
5256: LD_INT 2
5258: DOUBLE
5259: EQUAL
5260: IFTRUE 5264
5262: GO 5324
5264: POP
// begin AddComConstruct ( fabryka1 , ru_medium_tracked , engine_combustion , control_computer , ru_gun ) ;
5265: LD_INT 104
5267: PPUSH
5268: LD_INT 22
5270: PPUSH
5271: LD_INT 1
5273: PPUSH
5274: LD_INT 3
5276: PPUSH
5277: LD_INT 44
5279: PPUSH
5280: CALL_OW 185
// AddComConstruct ( fabryka2 , ru_medium_tracked , engine_combustion , control_computer , ru_gatling_gun ) ;
5284: LD_INT 112
5286: PPUSH
5287: LD_INT 22
5289: PPUSH
5290: LD_INT 1
5292: PPUSH
5293: LD_INT 3
5295: PPUSH
5296: LD_INT 43
5298: PPUSH
5299: CALL_OW 185
// AddComConstruct ( fabryka1 , ru_medium_tracked , engine_combustion , control_computer , ru_gun ) ;
5303: LD_INT 104
5305: PPUSH
5306: LD_INT 22
5308: PPUSH
5309: LD_INT 1
5311: PPUSH
5312: LD_INT 3
5314: PPUSH
5315: LD_INT 44
5317: PPUSH
5318: CALL_OW 185
// end ; 3 :
5322: GO 5393
5324: LD_INT 3
5326: DOUBLE
5327: EQUAL
5328: IFTRUE 5332
5330: GO 5392
5332: POP
// begin AddComConstruct ( fabryka1 , ru_heavy_tracked , engine_combustion , control_computer , ru_gun ) ;
5333: LD_INT 104
5335: PPUSH
5336: LD_INT 24
5338: PPUSH
5339: LD_INT 1
5341: PPUSH
5342: LD_INT 3
5344: PPUSH
5345: LD_INT 44
5347: PPUSH
5348: CALL_OW 185
// AddComConstruct ( fabryka1 , ru_heavy_tracked , engine_combustion , control_computer , ru_gatling_gun ) ;
5352: LD_INT 104
5354: PPUSH
5355: LD_INT 24
5357: PPUSH
5358: LD_INT 1
5360: PPUSH
5361: LD_INT 3
5363: PPUSH
5364: LD_INT 43
5366: PPUSH
5367: CALL_OW 185
// AddComConstruct ( fabryka2 , ru_heavy_tracked , engine_combustion , control_computer , ru_gun ) ;
5371: LD_INT 112
5373: PPUSH
5374: LD_INT 24
5376: PPUSH
5377: LD_INT 1
5379: PPUSH
5380: LD_INT 3
5382: PPUSH
5383: LD_INT 44
5385: PPUSH
5386: CALL_OW 185
// end ; end ;
5390: GO 5393
5392: POP
// end ;
5393: PPOPN 1
5395: END
// every 0 0$01 do var Level ;
5396: GO 5398
5398: DISABLE
5399: LD_INT 0
5401: PPUSH
// begin enable ;
5402: ENABLE
// Level = [ 2 , 3 , 3 ] [ Difficulty ] ;
5403: LD_ADDR_VAR 0 1
5407: PUSH
5408: LD_INT 2
5410: PUSH
5411: LD_INT 3
5413: PUSH
5414: LD_INT 3
5416: PUSH
5417: EMPTY
5418: LIST
5419: LIST
5420: LIST
5421: PUSH
5422: LD_OWVAR 67
5426: ARRAY
5427: ST_TO_ADDR
// if FilterAllUnits ( [ [ f_side , 6 ] , [ f_type , unit_vehicle ] , [ f_control , Control_Computer ] ] ) = Level then
5428: LD_INT 22
5430: PUSH
5431: LD_INT 6
5433: PUSH
5434: EMPTY
5435: LIST
5436: LIST
5437: PUSH
5438: LD_INT 21
5440: PUSH
5441: LD_INT 2
5443: PUSH
5444: EMPTY
5445: LIST
5446: LIST
5447: PUSH
5448: LD_INT 33
5450: PUSH
5451: LD_INT 3
5453: PUSH
5454: EMPTY
5455: LIST
5456: LIST
5457: PUSH
5458: EMPTY
5459: LIST
5460: LIST
5461: LIST
5462: PPUSH
5463: CALL_OW 69
5467: PUSH
5468: LD_VAR 0 1
5472: EQUAL
5473: IFFALSE 5480
// begin enable ( 50 ) ;
5475: LD_INT 50
5477: ENABLE_MARKED
// end else
5478: GO 5530
// if FilterAllUnits ( [ [ f_side , 6 ] , [ f_type , unit_vehicle ] , [ f_control , Control_Computer ] ] ) = Level then
5480: LD_INT 22
5482: PUSH
5483: LD_INT 6
5485: PUSH
5486: EMPTY
5487: LIST
5488: LIST
5489: PUSH
5490: LD_INT 21
5492: PUSH
5493: LD_INT 2
5495: PUSH
5496: EMPTY
5497: LIST
5498: LIST
5499: PUSH
5500: LD_INT 33
5502: PUSH
5503: LD_INT 3
5505: PUSH
5506: EMPTY
5507: LIST
5508: LIST
5509: PUSH
5510: EMPTY
5511: LIST
5512: LIST
5513: LIST
5514: PPUSH
5515: CALL_OW 69
5519: PUSH
5520: LD_VAR 0 1
5524: EQUAL
5525: IFFALSE 5530
// begin disable ( 50 ) ;
5527: LD_INT 50
5529: DISABLE_MARKED
// end ; end ;
5530: PPOPN 1
5532: END
// every 0 0$2 marked 50 do var i , atakujacy , broniacy ;
5533: GO 5535
5535: DISABLE
5536: LD_INT 0
5538: PPUSH
5539: PPUSH
5540: PPUSH
// begin enable ;
5541: ENABLE
// broniacy = FilterAllUnits ( [ f_side , 4 ] ) ;
5542: LD_ADDR_VAR 0 3
5546: PUSH
5547: LD_INT 22
5549: PUSH
5550: LD_INT 4
5552: PUSH
5553: EMPTY
5554: LIST
5555: LIST
5556: PPUSH
5557: CALL_OW 69
5561: ST_TO_ADDR
// atakujacy = FilterAllUnits ( [ [ f_side , 6 ] , [ f_type , unit_vehicle ] , [ f_control , Control_Computer ] ] ) ;
5562: LD_ADDR_VAR 0 2
5566: PUSH
5567: LD_INT 22
5569: PUSH
5570: LD_INT 6
5572: PUSH
5573: EMPTY
5574: LIST
5575: LIST
5576: PUSH
5577: LD_INT 21
5579: PUSH
5580: LD_INT 2
5582: PUSH
5583: EMPTY
5584: LIST
5585: LIST
5586: PUSH
5587: LD_INT 33
5589: PUSH
5590: LD_INT 3
5592: PUSH
5593: EMPTY
5594: LIST
5595: LIST
5596: PUSH
5597: EMPTY
5598: LIST
5599: LIST
5600: LIST
5601: PPUSH
5602: CALL_OW 69
5606: ST_TO_ADDR
// for i in atakujacy do
5607: LD_ADDR_VAR 0 1
5611: PUSH
5612: LD_VAR 0 2
5616: PUSH
5617: FOR_IN
5618: IFFALSE 5646
// begin ComAttackUnit ( i , NearestUnitToUnit ( broniacy , i ) ) ;
5620: LD_VAR 0 1
5624: PPUSH
5625: LD_VAR 0 3
5629: PPUSH
5630: LD_VAR 0 1
5634: PPUSH
5635: CALL_OW 74
5639: PPUSH
5640: CALL_OW 115
// end ;
5644: GO 5617
5646: POP
5647: POP
// end ;
5648: PPOPN 3
5650: END
